﻿Imports Entidad
Imports Datos

Public Class DocumentoAlmacenNegocio

    Dim dao As New DocumentoAlmacenDatos

    Sub registrarDocumentoAlmacen(da As DocumentoAlmacen)
        dao.registrarDocumentoAlmacen(da)
    End Sub

    Sub actualizarEstadoDocumentoAlmacen(cia As String, suc As String, tdoc As String, codDocumento As String, estado As String)
        dao.actualizarEstadoDocumentoAlmacen(cia, suc, tdoc, codDocumento, estado)
    End Sub

    Function generarCodigoDocumentoAlmacen(tdoc As String) As Integer
        Return dao.generarCodigoDocumentoAlmacen(tdoc)
    End Function

End Class
